(font-lock-after-change-function): Bind inhibit-quit.

diff --git a/lisp/font-lock.el b/lisp/font-lock.el
index 1be0b7245903214a5c9606f5c03905078c2ff229..b76c818a517024f3fce95e200ef123d09e2d8d43 100644 (file)
--- a/lisp/font-lock.el
+++ b/lisp/font-lock.el
@@ -1031,7 +1031,8 @@ what properties to clear before refontifying a region.")
 
 ;; Called when any modification is made to buffer text.
 (defun font-lock-after-change-function (beg end old-len)
-  (let ((inhibit-point-motion-hooks t))
+  (let ((inhibit-point-motion-hooks t)
+       (inhibit-quit t))
     (save-excursion
       (save-match-data
        ;; Rescan between start of lines enclosing the region.